home *** CD-ROM | disk | FTP | other *** search
/ Die Ultimative Software-P…i Collection 1996 & 1997 / Die Ultimative Software-Pakete CD-ROM fur Atari Collection 1996 & 1997.iso / g / gnu_c / gemlib30.zoo / common.s < prev    next >
Encoding:
Text File  |  1993-08-11  |  1.5 KB  |  94 lines

  1. #NO_APP
  2. gcc2_compiled.:
  3. ___gnu_compiled_c:
  4. .globl __aesparams
  5. .data
  6.     .even
  7. __aesparams:
  8.     .long __contrl
  9.     .long __global
  10.     .long __intin
  11.     .long __intout
  12.     .long __ptsin
  13.     .long __ptsout
  14. .globl __vdiparams
  15.     .even
  16. __vdiparams:
  17.     .long __contrl
  18.     .long __intin
  19.     .long __ptsin
  20.     .long __intout
  21.     .long __ptsout
  22. .text
  23.     .even
  24. .globl ___aes__
  25. ___aes__:
  26.     moveml #0x3030,sp@-
  27.     lea a4@(__aesparams:w),a3
  28.     movel a3,d3
  29. #APP
  30.       movel    sp@(20),  d1
  31.     lea a4@(__contrl:w),a0 | arrays _contrl and _control overlap 
  32.     moveq    #0,  d0
  33.     movepl    d0,  a0@(0)    | clear high bytes of control array
  34.         movepl    d1,  a0@(1)
  35.         movl    d3,    d1
  36.         movw    #0xc8, d0    | note -- no movq here, it sign extends
  37.         trap    #2
  38. #NO_APP
  39.     movew a4@(__intout:w),d0
  40.     moveml sp@+,#0xc0c
  41.     rts
  42.     .even
  43. .globl ___vdi__
  44. ___vdi__:
  45.     moveml #0x3830,sp@-
  46.     movel sp@(24),d0
  47.     movew sp@(28),d2
  48.     lea a4@(__vdiparams:w),a3
  49.     movel a3,d3
  50.     lea a4@(__contrl:w),a0
  51.     movew #255,d1
  52.     movew d0,d4
  53.     andw d1,d4
  54.     movew d4,a0@
  55.     lsrl #8,d0
  56.     andw d0,d1
  57.     movew d1,a0@(6)
  58.     lsrl #8,d0
  59.     movew d0,d4
  60.     andw #2047,d4
  61.     movew d4,a0@(2)
  62.     moveq #11,d4
  63.     lsrl d4,d0
  64.     movew d0,a0@(10)
  65.     movew d2,a0@(12)
  66. #APP
  67.          movl    d3,    d1
  68.         movq    #0x73, d0
  69.         trap    #2
  70. #NO_APP
  71.     moveml sp@+,#0xc1c
  72.     rts
  73.     .even
  74. .globl _vdi
  75. _vdi:
  76.     moveml #0x3030,sp@-
  77.     lea a4@(__vdiparams:w),a3
  78.     movel a3,d3
  79. #APP
  80.          movl    d3,    d1
  81.         movq    #0x73, d0
  82.         trap    #2
  83. #NO_APP
  84.     moveml sp@+,#0xc0c
  85.     rts
  86. .comm __intin,510
  87. .comm __intout,90
  88. .comm __ptsin,4096
  89. .comm __ptsout,24
  90. .comm __contrl,24
  91. .comm __global,30
  92. .comm _gl_apid,2
  93. .comm _gl_ap_version,2
  94.